Public Class PublishObject
	Inherits TcKs.MSOffice.Common.ChildObjectWrapperBase
	
	Friend Sub New ( ByVal nativeObject As Global.System.Object,  ByVal rootObject As Global.TcKs.MSOffice.Common.RootObjectWrapperBase )
		MyBase.New ( nativeObject, rootObject )
	End Sub 
	
	Public Sub Delete(  )
		MyBase.WrappedObject.Delete(  )
	End Sub 
	
	Public Sub Publish( aCreate As Global.System.Object )
		Dim tmp_Create As Global.System.Object = Global.TcKs.MSOffice.Common.WrapperHelper.GetWrappedObjectIfCan( aCreate )
		MyBase.WrappedObject.Publish( tmp_Create )
	End Sub 
	
	Public ReadOnly Property Application As Global.TcKs.MSOffice.Excel.Application
		Get 
			Dim ret As Global.TcKs.MSOffice.Excel.Application =  Me.FindTopRootObject()
			Return ret
		End Get 
	End Property 
	
	Public ReadOnly Property Creator As Global.TcKs.MSOffice.Excel.XlCreator
		Get 
			Return MyBase.WrappedObject.Creator
		End Get 
	End Property 
	
	Public ReadOnly Property Parent As Global.System.Object
		Get 
			Return MyBase.WrappedObject.Parent
		End Get 
	End Property 
	
	Public ReadOnly Property DivID As Global.System.String
		Get 
			Return MyBase.WrappedObject.DivID
		End Get 
	End Property 
	
	Public ReadOnly Property Sheet As Global.System.String
		Get 
			Return MyBase.WrappedObject.Sheet
		End Get 
	End Property 
	
	Public ReadOnly Property SourceType As Global.TcKs.MSOffice.Excel.XlSourceType
		Get 
			Return MyBase.WrappedObject.SourceType
		End Get 
	End Property 
	
	Public ReadOnly Property Source As Global.System.String
		Get 
			Return MyBase.WrappedObject.Source
		End Get 
	End Property 
	
	Public Property HtmlType As Global.TcKs.MSOffice.Excel.XlHtmlType
		Get 
			Return MyBase.WrappedObject.HtmlType
		End Get 
		Set ( ByVal Value As Global.TcKs.MSOffice.Excel.XlHtmlType )
			MyBase.WrappedObject.HtmlType = Value 
		End Set 
	End Property 
	
	Public Property Title As Global.System.String
		Get 
			Return MyBase.WrappedObject.Title
		End Get 
		Set ( ByVal Value As Global.System.String )
			MyBase.WrappedObject.Title = Value 
		End Set 
	End Property 
	
	Public Property Filename As Global.System.String
		Get 
			Return MyBase.WrappedObject.Filename
		End Get 
		Set ( ByVal Value As Global.System.String )
			MyBase.WrappedObject.Filename = Value 
		End Set 
	End Property 
	
	Public Property AutoRepublish As Global.System.Boolean
		Get 
			Return MyBase.WrappedObject.AutoRepublish
		End Get 
		Set ( ByVal Value As Global.System.Boolean )
			MyBase.WrappedObject.AutoRepublish = Value 
		End Set 
	End Property 
	
End Class 
